From 90e54815b537d2ddc56a3b5c7f19b21a9e0900ec Mon Sep 17 00:00:00 2001 From: justbur Date: Mon, 3 Aug 2015 14:54:20 -0400 Subject: [PATCH] Fix ref to free var --- which-key.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/which-key.el b/which-key.el index cb68ec06af5..6ec03c22ecf 100644 --- a/which-key.el +++ b/which-key.el @@ -921,7 +921,7 @@ Returns a plist that holds the page strings, as well as metadata." (let ((cols-w-widths (mapcar #'which-key--pad-column (-partition-all avl-lines keys))) (page-width 0) (n-pages 0) (n-keys 0) - page-cols pages page-widths keys/page) + page-cols pages page-widths keys/page col) (if (> (apply #'max (mapcar #'car cols-w-widths)) avl-width) ;; give up if any columns don't fit (list :pages nil :page-height 0 :page-widths '(0) -- 2.30.2